<?php

/*
    [UCenter] (C)2001-2099 Comsenz Inc.
    This is NOT a freeware, use is subject to license terms

    $Id: sendmail.inc.php 1059 2011-03-01 07:25:09Z monkey $
*/

!defined('IN_UC') && exit('Access Denied');

if ($mail_setting['mailsilent']) {
    error_reporting(0);
}

$maildelimiter = 1 == $mail_setting['maildelimiter'] ? "\r\n" : (2 == $mail_setting['maildelimiter'] ? "\r" : "\n");
$mailusername = isset($mail_setting['mailusername']) ? $mail_setting['mailusername'] : 1;
$appname = $this->base->cache['apps'][$mail['appid']]['name'];
$mail['subject'] = '=?'.$mail['charset'].'?B?'.base64_encode(str_replace("\r", '', str_replace("\n", '', '['.$appname.'] '.$mail['subject']))).'?=';
$mail['message'] = chunk_split(base64_encode(str_replace("\r\n.", " \r\n..", str_replace("\n", "\r\n", str_replace("\r", "\n", str_replace("\r\n", "\n", str_replace("\n\r", "\r", $mail['message'])))))));

$email_from = '' == $mail['frommail'] ? '=?'.$mail['charset'].'?B?'.base64_encode($appname)."?= <$mail_setting[maildefault]>" : (preg_match('/^(.+?) \<(.+?)\>$/', $email_from, $from) ? '=?'.$mail['charset'].'?B?'.base64_encode($from[1])."?= <$from[2]>" : $mail['frommail']);

foreach (explode(',', $mail['email_to']) as $touser) {
    $tousers[] = preg_match('/^(.+?) \<(.+?)\>$/', $touser, $to) ? ($mailusername ? '=?'.$mail['charset'].'?B?'.base64_encode($to[1])."?= <$to[2]>" : $to[2]) : $touser;
}

$mail['email_to'] = implode(',', $tousers);

$headers = "From: $email_from{$maildelimiter}X-Priority: 3{$maildelimiter}X-Mailer: Discuz! $version{$maildelimiter}MIME-Version: 1.0{$maildelimiter}Content-type: text/".($mail['htmlon'] ? 'html' : 'plain')."; charset=$mail[charset]{$maildelimiter}Content-Transfer-Encoding: base64{$maildelimiter}";

$mail_setting['mailport'] = $mail_setting['mailport'] ? $mail_setting['mailport'] : 25;

if (1 == $mail_setting['mailsend'] && function_exists('mail')) {
    return @mail($mail['email_to'], $mail['subject'], $mail['message'], $headers);
} elseif (2 == $mail_setting['mailsend']) {
    if (!$fp = fsockopen($mail_setting['mailserver'], $mail_setting['mailport'], $errno, $errstr, 30)) {
        return false;
    }

    stream_set_blocking($fp, true);

    $lastmessage = fgets($fp, 512);
    if ('220' != substr($lastmessage, 0, 3)) {
        return false;
    }

    fputs($fp, ($mail_setting['mailauth'] ? 'EHLO' : 'HELO')." discuz\r\n");
    $lastmessage = fgets($fp, 512);
    if (220 != substr($lastmessage, 0, 3) && 250 != substr($lastmessage, 0, 3)) {
        return false;
    }

    while (1) {
        if ('-' != substr($lastmessage, 3, 1) || empty($lastmessage)) {
            break;
        }
        $lastmessage = fgets($fp, 512);
    }

    if ($mail_setting['mailauth']) {
        fputs($fp, "AUTH LOGIN\r\n");
        $lastmessage = fgets($fp, 512);
        if (334 != substr($lastmessage, 0, 3)) {
            return false;
        }

        fputs($fp, base64_encode($mail_setting['mailauth_username'])."\r\n");
        $lastmessage = fgets($fp, 512);
        if (334 != substr($lastmessage, 0, 3)) {
            return false;
        }

        fputs($fp, base64_encode($mail_setting['mailauth_password'])."\r\n");
        $lastmessage = fgets($fp, 512);
        if (235 != substr($lastmessage, 0, 3)) {
            return false;
        }

        $email_from = $mail_setting['mailfrom'];
    }

    fputs($fp, 'MAIL FROM: <'.preg_replace("/.*\<(.+?)\>.*/", '\\1', $email_from).">\r\n");
    $lastmessage = fgets($fp, 512);
    if (250 != substr($lastmessage, 0, 3)) {
        fputs($fp, 'MAIL FROM: <'.preg_replace("/.*\<(.+?)\>.*/", '\\1', $email_from).">\r\n");
        $lastmessage = fgets($fp, 512);
        if (250 != substr($lastmessage, 0, 3)) {
            return false;
        }
    }

    $email_tos = array();
    foreach (explode(',', $mail['email_to']) as $touser) {
        $touser = trim($touser);
        if ($touser) {
            fputs($fp, 'RCPT TO: <'.preg_replace("/.*\<(.+?)\>.*/", '\\1', $touser).">\r\n");
            $lastmessage = fgets($fp, 512);
            if (250 != substr($lastmessage, 0, 3)) {
                fputs($fp, 'RCPT TO: <'.preg_replace("/.*\<(.+?)\>.*/", '\\1', $touser).">\r\n");
                $lastmessage = fgets($fp, 512);

                return false;
            }
        }
    }

    fputs($fp, "DATA\r\n");
    $lastmessage = fgets($fp, 512);
    if (354 != substr($lastmessage, 0, 3)) {
        return false;
    }

    $headers .= 'Message-ID: <'.gmdate('YmdHs').'.'.substr(md5($mail['message'].microtime()), 0, 6).rand(100000, 999999).'@'.$_SERVER['HTTP_HOST'].">{$maildelimiter}";

    fputs($fp, 'Date: '.gmdate('r')."\r\n");
    fputs($fp, 'To: '.$mail['email_to']."\r\n");
    fputs($fp, 'Subject: '.$mail['subject']."\r\n");
    fputs($fp, $headers."\r\n");
    fputs($fp, "\r\n\r\n");
    fputs($fp, "$mail[message]\r\n.\r\n");
    $lastmessage = fgets($fp, 512);
    if (250 != substr($lastmessage, 0, 3)) {
        return false;
    }

    fputs($fp, "QUIT\r\n");

    return true;
} elseif (3 == $mail_setting['mailsend']) {
    ini_set('SMTP', $mail_setting['mailserver']);
    ini_set('smtp_port', $mail_setting['mailport']);
    ini_set('sendmail_from', $email_from);

    return @mail($mail['email_to'], $mail['subject'], $mail['message'], $headers);
}
